/*
 * Copyright (c) 2010-2022 Belledonne Communications SARL.
 *
 * This file is part of Liblinphone
 * (see https://gitlab.linphone.org/BC/public/liblinphone).
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Affero General Public License as
 * published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Affero General Public License for more details.
 *
 * You should have received a copy of the GNU Affero General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 */

#include <bctoolbox/defs.h>

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "linphone/api/c-address.h"
#include "linphone/core.h"

extern SipSetup linphone_sip_login;
static SipSetup *all_sip_setups[] = {&linphone_sip_login, NULL};

static bctbx_list_t *registered_sip_setups = NULL;

void sip_setup_register(SipSetup *ss) {
	registered_sip_setups = bctbx_list_append(registered_sip_setups, ss);
}

void sip_setup_register_all(MSFactory *factory) {
	SipSetup **p = all_sip_setups;
	ms_factory_init_plugins(factory);
	while (*p != NULL) {
		sip_setup_register(*p);
		p++;
	}
}

const bctbx_list_t *linphone_core_get_sip_setups(BCTBX_UNUSED(LinphoneCore *lc)) {
	return registered_sip_setups;
}

SipSetup *sip_setup_lookup(const char *type_name) {
	bctbx_list_t *elem;
	for (elem = registered_sip_setups; elem != NULL; elem = elem->next) {
		SipSetup *ss = (SipSetup *)elem->data;
		if (strcasecmp(ss->name, type_name) == 0) {
			if (!ss->initialized) {
				if (ss->init != NULL) ss->init();
				ss->initialized = TRUE;
				if (ss->capabilities == 0) {
					ms_error("%s SipSetup isn't capable of anything ?", ss->name);
				}
			}
			return ss;
		}
	}
	ms_warning("no %s setup manager declared.", type_name);
	return NULL;
}

void sip_setup_unregister_all(void) {
	bctbx_list_t *elem;
	for (elem = registered_sip_setups; elem != NULL; elem = elem->next) {
		SipSetup *ss = (SipSetup *)elem->data;
		if (ss->initialized) {
			if (ss->exit) ss->exit();
			ss->initialized = FALSE;
		}
	}
	registered_sip_setups = bctbx_list_free(registered_sip_setups);
}

void buddy_lookup_request_set_key(BuddyLookupRequest *req, const char *key) {
	if (req->key != NULL) {
		ms_free(req->key);
		req->key = NULL;
	}
	if (key) req->key = ms_strdup(key);
}

void buddy_lookup_request_set_max_results(BuddyLookupRequest *req, int ncount) {
	req->max_results = ncount;
}

void buddy_lookup_request_free(BuddyLookupRequest *req) {
	if (req->key) ms_free(req->key);
	if (req->results) {
		bctbx_list_for_each(req->results, (void (*)(void *))buddy_info_free);
		bctbx_list_free(req->results);
	}
	ms_free(req);
}

LinphoneProxyConfig *sip_setup_context_get_proxy_config(const SipSetupContext *ctx) {
	return ctx->cfg;
}

SipSetupContext *sip_setup_context_new(SipSetup *s, struct _LinphoneProxyConfig *cfg) {
	SipSetupContext *obj = (SipSetupContext *)ms_new0(SipSetupContext, 1);
	obj->funcs = s;
	obj->data = NULL;
	obj->cfg = cfg;
	if (obj->funcs->init_instance) {
		obj->funcs->init_instance(obj);
	}
	return obj;
}

unsigned int sip_setup_get_capabilities(SipSetup *s) {
	return s->capabilities;
}

int sip_setup_context_get_capabilities(SipSetupContext *ctx) {
	return (int)ctx->funcs->capabilities;
}

LinphoneStatus sip_setup_context_create_account(
    SipSetupContext *ctx, const char *uri, const char *passwd, const char *email, int suscribe) {
	if (ctx->funcs->create_account) return ctx->funcs->create_account(ctx, uri, passwd, email, suscribe);
	else return -1;
}

int sip_setup_context_account_exists(SipSetupContext *ctx, const char *uri) {
	if (ctx->funcs->account_exists) return ctx->funcs->account_exists(ctx, uri);
	return -1;
}

int sip_setup_context_account_validated(SipSetupContext *ctx, const char *uri) {
	if (ctx->funcs->account_validated) return ctx->funcs->account_validated(ctx, uri);
	return -1;
}

LinphoneStatus
sip_setup_context_login_account(SipSetupContext *ctx, const char *uri, const char *passwd, const char *userid) {
	LinphoneAddress *from = linphone_address_new(uri);
	if (from == NULL) {
		ms_warning("Fail to parse %s", uri);
		return -1;
	}
	strncpy(ctx->domain, linphone_address_get_domain(from), sizeof(ctx->domain) - 1);
	ctx->domain[sizeof(ctx->domain) - 1] = '\0';
	strncpy(ctx->username, linphone_address_get_username(from), sizeof(ctx->username) - 1);
	ctx->username[sizeof(ctx->username) - 1] = '\0';
	linphone_address_unref(from);
	if (ctx->funcs->login_account) return ctx->funcs->login_account(ctx, uri, passwd, userid);
	return -1;
}

LinphoneStatus sip_setup_context_get_proxy(SipSetupContext *ctx, const char *domain, char *proxy, size_t sz) {
	if (ctx->funcs->get_proxy) return ctx->funcs->get_proxy(ctx, domain ? domain : ctx->domain, proxy, sz);
	return -1;
}

LinphoneStatus sip_setup_context_get_stun_servers(SipSetupContext *ctx, char *stun1, char *stun2, size_t size) {
	if (ctx->funcs->get_stun_servers) return ctx->funcs->get_stun_servers(ctx, stun1, stun2, size);
	return -1;
}

LinphoneStatus sip_setup_context_get_relay(SipSetupContext *ctx, char *relay, size_t size) {
	if (ctx->funcs->get_relay) return ctx->funcs->get_relay(ctx, relay, size);
	return -1;
}

BuddyLookupRequest *sip_setup_context_create_buddy_lookup_request(SipSetupContext *ctx) {
	if (ctx->funcs->buddy_lookup_funcs) return ctx->funcs->buddy_lookup_funcs->request_create(ctx);
	return NULL;
}

LinphoneStatus sip_setup_context_buddy_lookup_submit(SipSetupContext *ctx, BuddyLookupRequest *req) {
	if (ctx->funcs->buddy_lookup_funcs) return ctx->funcs->buddy_lookup_funcs->request_submit(ctx, req);
	return -1;
}

LinphoneStatus sip_setup_context_buddy_lookup_free(SipSetupContext *ctx, BuddyLookupRequest *req) {
	if (ctx->funcs->buddy_lookup_funcs) return ctx->funcs->buddy_lookup_funcs->request_free(ctx, req);
	return -1;
}

const char *sip_setup_context_get_notice(SipSetupContext *ctx) {
	if (ctx->funcs->get_notice) return ctx->funcs->get_notice(ctx);
	return NULL;
}

const char **sip_setup_context_get_domains(SipSetupContext *ctx) {
	if (ctx->funcs->get_domains) return ctx->funcs->get_domains(ctx);
	return NULL;
}

LinphoneStatus sip_setup_context_logout(SipSetupContext *ctx) {
	if (ctx->funcs->logout_account) {
		return ctx->funcs->logout_account(ctx);
	}
	return -1;
}

void sip_setup_context_free(SipSetupContext *ctx) {
	if (ctx->funcs->uninit_instance) {
		ctx->funcs->uninit_instance(ctx);
	}
	ms_free(ctx);
}

BuddyInfo *buddy_info_new() {
	return ms_new0(BuddyInfo, 1);
}

void buddy_info_free(BuddyInfo *info) {
	if (info->image_data != NULL) ms_free(info->image_data);
	ms_free(info);
}
